Устанавливаем ссылку на DLL.

Кнопку на форму и код к ней.

Private Sub Command1_Click()
Dim a As MYMFC
Set a = New MYMFC
a.Test
Set a = Nothing
End Sub

Запускаем и смотрим.

Все работает.